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HowTo Find 
Wasted Disk Space 

Sooner or later, the disk in a Pick 
computer will appear to fill up with data and 
run out of available space. Usually a large 
portion of the disk is actually still unused, 
because of inefficiently allocated files. This 
article describes how to find that unused, 
wasted disk space and free it up for storing 
more data. 

The first step towards cleaning up a Pick 
disk is to determine just how much space the 
operating system thinks is still left on the disk. 
The WHAT verb in some Pick implementations 
will display the total number of unused, 
available disk frames, where each frame holds 
500 bytes (characters) of data. If the WHAT 
command is insufficient, give the POVF 
command to display both the total number of 
unused contiguous frames and the total 
number of unused linked frames (if any), 
which together are the total number of unused, 
available frames on the disk. Divide the total 
of these unused frames by the number of all 
frames on the disk (which is also shown by the 
WHAT verb) to determine the percentage of 
unused disk space. For example, 4995 
unused frames divided by 36392 total disk 
frames indicates that 14% of the disk is still left 
for future files or intermediate data such as the 
select lists temporarily created by the 
operating system during sorts. 

If your percentage of available disk space 
is a large, comfortable amount, then searching 
for wasted disk space is probably not yet worth 
the effort. But if your calculations indicate that 
disk space is close to running out, it's time to 
do some housecleaning. The next step is to 
examine the statistics in the STAT-FILE to 
determine just how efficiently the disk is being 
used, and where the waste is. After doing a 
FILE-SAVE, give the command SORT 
STAT-FILE BY-DSND FRAMES NAME 
FRAMES %UT to show all files, largest file 
first. (Your system may require a command 
using slightly different dictionary words for file 
names and their frame counts.) The %UT 
dictionary word should be defined as 



























Tired of waiting for 
your Pick™ computer to 
C SORT or SELECT your 
large data files? 


Need to quickly find 
any attribute? Want to 
scroll files up or down, 
while in any sort order? 


Now you can use B-TREE-P to 
instantly search, sort, and scroll 
any data from any Pick file! 

Now you can instantly look up customers by name, street, Zip code, or any other 
field — not just by customer number. Now you can immediately find inventory 
entries by quantity, cost, or description — not just by part number. Whatever 
files you use, now you can instantly locate and display your data any way you 
want, without having to wait for endless SORTs and SELECTS. 



Immediately display any record in any file just by typing one 
or more starting characters that match any field in the record. 

You can display not only a selected record, but also any 
previous and next records, using any sort order you specify. 

You can jump to any record in a file at any time, then browse 
through the file by scrolling up or down, a record at a time, 
or a page at a time, in any sort order. 

Ask us for a free copy of Product Profiles #24, describing how B-TREE-P was originally 
developed and put to work. As one of Semaphore’s programmers says: "We often ask 
ourselves why we waited so long to create B-TREE-P. After using it for our own 
production work, we wonder how we ever got by before without it. A Pick computer 
without B-TREE-P is like a car without wheels”. 


B-TREE-P is a proven collection of 
BASIC subprograms for using 
B-trees on Pick computer systems. 
B-trees allow any of the data in any 
of your Pick files to be instantly 
located and displayed in any sort 
order, without having to wait for 
SORT or SELECT commands. 


B-TREE-P and a few minor 
modifications to your existing data 
entry programs are all that is 
necessary for you to immediately 
be able to search, display, and 
browse through your data quickly 
and conveniently. 




Modifications to your existing data 
files are absolutely unnecessary! 



TREE-P 

B-trees for 
Pick systems. 


B-TREE-P includes all necessary 
BASIC source code for a B-tree 
system that works with any file: 

• Insertion subroutine 

• Deletion subroutine 

• Lookup subroutine 

• Previous/next subroutine 

• Complete instructions 

Plus, you receive the source code 
for a complete demonstration 
system that uses B-TREE-P to 
maintain a name and address file: 

Editor program for creating and 
changing names and addresses. 
Browser program for displaying 
names and addresses. 
Printer program for listing file 
items in order without having to 
wait for a sort. 


Here's how to order: 

Send your name, address, 
telephone number, and your 
check for $395 payable to 
Semaphore Corporation to: 

Semaphore Corporation 
207 Granada Drive 
Aptos, CA 95003 

We'll send you complete 
B-TREE-P source code 
listings and all necessary 
documentation. 

Call us at (408) 688-9200! 

WARNING: B-TREE-P includes a license 
agreement with copy, use, and transfer 
restrictions limiting your use of B-TREE-P to 
one computer at a time. Multi-CPU and OEM 
resale agreements are also available. 


Pick is a trademark of Pick Systems. 




























Unlock The 
Secrets In 
Vour Computer! 

Pragma is a 48-page journal for Pick users published quarterly 
from August 1982 through February 1984. €ach issue is pocked 
with software and helpful information, including complete and 
debugged program listings and detailed, explanatory articles 
for readers at all levels of experience. Order your issues to¬ 
day and begin unlocking the secrets in your Pick system! 


Pragma #1, August 1982: Welcome to Pragma • ZIP Code File Desion 
for Renumbering Statement Labels • Deriving 
No-Frills Manufacture 


^Program 
ILA, The 
• More 
ig Miss- 
Building 

^M^item Identifiers Hash Well • 
THTfexit Problem in 3.2 SCR€€NPRO(TM) • The Shell 



Pragma #2, November 1982: We Have Liftoff • fl Modulo Setting Program • Black 
Box Formatting • TRIM.D6LIM and PROFILE Utilities • SVSMAP, fl Cross-Reference 
System: File Format Input • Galinski Hamburg User Profile • LOOP vs. LOCflTC 
Benchmarks • 25 Wish List Items • An Introduction to 6NGLISH-. Jargon • Proc Con¬ 
versions • VANILLA, The No-Frills Manufacturing System: Bill of Material Input • 14 
Queries • The Trouble Tree • 2 Letters • A Switchbox for 32 Ports • Security and 
the DATA/8ASIC(TM) Programmer • The Cookie Game • Some New Subscribers. 

Pragma #3, February 1983: Is Pragma a Rare Medium, Well Done? • €dit Aides • A 
Proc for Cross-Referencing Q-Pointers • SVSMAP, A Cross-Reference System: Re¬ 
maining File Input • Rainbow Natural Foods User Profile • More BASIC Benchmark 
Comparisons • Justifying Ragged Output • 13 Wish List Items • Generating Monthly 
Column Headings • VANILLA, The No-Frills Manufacturing System: Purchasing • 5 
Queries • An Introduction to 6NGLISH: More Commands • Shared Site Checklist • 
Converting Paint to Programs • 3 Letters • Generating Blank Forms • Animal, A 
Game that Learns • More New Subscribers. 

Pragma #4, Moy 1983: Survey Says... • Pacific Valley Bank User Profile • SVSMAP, 
A Cross-Reference System: Diets and Procs • Uncompiling: Unassembling Stack 
Code • Left vs. Right Justification Benchmarks • 4 Wish List Items • A Comparison of 
BASIC Implementations • More New Subscribers • An Undocumented Cditor 
Capability • 3 Local User Group Reports • Avoiding Saved Lists with PQ-RCSCL6CT 
• Self-Documenting Reports • A Query • A Survey of Hardware that Supports Pick- 
Style Software • Printer Trade-Offs • An Introduction to 6NGLISH: Finding files • A 
Letter * VANILLA, The No-Frills Manufacturing System: Purchase Order Cntry • The 
Swatl Game. 


Pragma #5, August 1983: Happy Birthdayl • Interactive Systems Producer Profile • 
Uncompiling: Regenerating Source Code • A Day of Revelation • IBM Personal Com¬ 
puter vs. Microdata(TM) Reality® Benchmarks • VANILLA, The No-Frills Manufactur¬ 
ing System: Receiving • 3 Wish List Items • An Introduction to CNGLISH: 8eing 
Choosy • Converting Manual Paint to Programs • 6 Local User Group Reports • 
More New Subscribers • A Program that Reports File Pointer Locations • Boiler 
Plate Processing with Runoff(TM) • A New Query and an Old Query Answered • 
SVSMAP, A Cross-Reference System: Automation • Tape Types • 6 Letters • Per¬ 
muted Index to the First Four Issues of Pragma • Amazing, a Maze Game. 

Pragma #6, November 1983: Pick Pie Pictured • The Ubiquitous POINTCR-FIL6 • Un¬ 
compiling: Resolving Labels • An Introduction to 6NGLISH: Syntax Overview • Ac¬ 
cuSoft Producer Profile • Rounding Out 7 Benchmarks On 5 Machines • Designing 
Data €ntry Programs • 12 Wish List Items • G€T: An Input Processor • 5 Local User 
Group Reports • More New Subscribers • Do Vou Know Vour Proc Limits? • 
VANILLA, The No-Frills Manufacturing System: Inspection • 2 Queries • Individual 
Accounts or Shared Accounts? • Lock Logic Illustrated • Password Protection • Two 
Undocumented Conversions • A Letter • How AMAZING Works. 

Pragma #7, February 1984: More New Subscribers • A New Machine Visits Pragma 
• Bantam Hardware Overview • Suppressing LOCK6D Clauses • An Introduction to 
6NGLISH: WITH, BV and TOTAL • Bantam Producer Profile • VANILLA, The No-Frills 
Manufacturing System: Disposition • A Bantam Diary • New Benchmark Timings For 
8 More Machines • 6 Local User Group Reports • G€T: Source Code • A 
Preprocessor for Symbolic Statement Labels • 2 Wish List Items • 3 Queries • Ban¬ 
tam Software Overview • A Letter • The Slide Game. 


Send $25 for each 48-page bock issue to: 


Pragma 

207 Granada Drive 
Aptos, CA 95003 
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in order to divide the file's actual byte count by 
the total bytes available in all the file's frames, 
thereby showing "percent utilization", or how 
full the file's frames are with data. Since each 
frame in a file uses up 500 bytes of disk space, 
whether or not the frame holds any data, files 
with a low %UT are space wasters, and can 
probably be adjusted to free up some of those 
unused frames. Files with a high %UT are 
already using their frame space efficiently, and 
are probably best left alone. 

When a file is created, a required 
parameter called the modulo specifies how 
many initial disk frames are to be allocated for 
the file's data. As items are stored in the file, a 
frame will eventually fill up, so an additional 
frame is "linked" on to the full frame to provide 
more space for the file's items. Each initial 
frame with its linked extension frames is called 
a group. The current state of a file and its 
groups can be displayed at any time as a 
histogram by using the ISTAT command: 

FILE=BP M0DUL0=5 SEPAR=1 
FRAMES BYTES ITMS 
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Each row of the histogram represents one 
group in the file, and the number of groups is 
always equal to the file's modulo. From left to 
right, the columns on the left side of the 
histogram indicate the number of frames, 
bytes, and items in each group. The total 
frames consumed by the file is shown at the 
bottom of the frames column. A right angle 
bracket (>) represents each item in the file. In 
the above example, the file consists of five 
groups. The first group uses one frame to hold 
two items totaling 389 bytes, the second group 
consists of one empty frame with no items, the 
third group needs two frames to hold three 
items made of 631 bytes, the fourth and 
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largest group occupies five frames holding two 
items totaling 2153 bytes, and the last group 
has three frames and one 1298-byte item, so 
the file requires 12 frames all together. 

In an ideally allocated file, items are 
evenly spread amongst all groups in the file. 
But in actual practice, the random nature of file 
data causes some items to gang up in some 
groups while leaving other groups completely 
empty. Or, because the data in the file has 
grown or shrunk over time, the file's modulo 




SO CAL FIELD SERVICE 
WE BUY USED ZEBRAS 


ATKIN JONES 

COMPUTER SERVICE 

[714] 353-4351 



The Pick System is designed to courses embody Dick Pick’s 

be user friendly. Now, Pick is philosophy on data processing, 

offering three courses to make it a and each one is taught by an 

fast friendship. instructor who is current on the 

These courses cover —— ,atest developments 

a range of instruc- j ! j j j iSpHC in the system. 

tion for everyone m g c—-- This is your chance 

from the Pick novice SYSTEMS to pick our brains 
to the advanced programmer. about the Pick System. 

What really makes these For additional information 
courses unique is that they send in the form to Pick Systems 
come from the original source — 1691 Browning, Irvine, California 

Pick Systems itself. All the 92714 or call (714) 261-7425. 

Please send a registration application and course schedule to: 

Name_____— 

Title___ 

Company ____ 

Address ____ 

City/State/Zip-—— 

Phone _____ 




Reality 

Sequel 

128 MB Reflex II 

IMB Memory 

50 MB Reflex 1 

ACLC 

128 K Mos Memory 

Disc Drives 

Intelligent 8-Ways 

Controllers 

Tape Drives 

Complete Systems 

Complete Systems 



• Quick Delivery 

• Competitive Prices 

• Trade-Ins Accepted 

• Professional Service 

• Repair 

• New Or Used 

• Maintenance Guarantee 

• Adds, Wyse Crts 

Printronix Printers 


EASTCOMPir INC. 


CALL CHUCK HAAS 
513-528-5400 
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PICK SPECIALISTS 

SAVINGS UP TO 50% OFF MANUFACTURERS LIST PRICE 


SELL 

BUY 



( 415 ) 490-8733 


ADDS-MENTOR 

ULTIMATE 

MICRODATA 

GA-ZEBRA 

PRIME 

PRINTRONIX 

CIE-PRINTERS 


SYSTEMS—PERIPHERALS—PRINTERS 


• New and Used Equipment 

• Immediate Delivery 

• Upgrades and Spares 

WE NEED TO BUY YOUR 
USED EQUIPMENT/PLEASE CALL 


BAfSIDE (415) 490-8733 

43537 Ocaso Corte 



COMPUTER CORPORATION Fremont, CA 94539 


FREE Back Issues 


A few back issues of Pragma's Product Profiles are still 1 
available while supplies last. To receive your FREE 
copies, indicate which issues you need and send a stamped, 
self-addressed envelope to: 

Pragma • 207 Granada Dr. • Aptos CA 95003 

(Allow 1.5 oz. per issue to compute postage.) 
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#7: Manufacturing Users And Vendors Wanted 

#8: A Look At ScreenPlay 

#10: Beyond The Power Of The Pick System 

#11: Open Architecture Status Report 

#12: Our Impressions Of The Zebra 750 

#13: What Should Standard Pick Be? 

#14: Our Third Annual Pick Hardware Survey 

#15: The Wonders Of A Software Upgrade 

#17: A READ Sometimes Fails 

#19: New Pick Book A Disappointment 

#21: Programming For Speed 

#22: How Files Grow 

#23: GA About To Release 3.2 

#24: Beyond The Power Of Pick, Revisited 



may no longer be optimum. In that case, it can 
be adjusted to free up wasted disk frames. 

The best way to experiment with 
alternative modulos in order to remove 
unused frames from files is to use the 
HASH-TEST verb. HASH-TEST outputs the 
same histogram as ISTAT, but accepts any 
suggested modulo for the file in order to show 
how frame usage in the file would change. 

For example, if we use HASH-TEST on our 
example BP file, but specify a test modulo of 3, 
the histogram becomes: 

FILE=BP MODULO=3 SEPAR=1 
FRAMES BYTES ITMS 

4 1687 3 *»> 

2 631 3 *»> 

5 2153 2 *» 

11 

So HASH-TEST shows that if we re-create 
our BP file with a modulo of 3 instead of 5, the 
file ends up using only 11 frames instead of 
12, thereby making 500 more bytes of disk 
space available for other purposes. For large 
files with lots of groups, the savings revealed 
by HASH-TEST can be considerable. (Use 
the S option when trying HASH-TEST on files 
with large modulos in order to suppress the 
histogram and avoid paging through a long 
listing before getting to the frame total at the 
end of the report.) 

Of course, a modulo of one guarantees the 
minimum number of frames per file since all 
items get packed into one giant group, but the 
average frames per group should be kept as 
small as possible to minimize excessive disk 
access. Since the operating system must 
search sequentially through items in a group 
by reading the disk frame by frame to find one 
particular item, having too many items and 
frames in a group slows down system 
throughput considerably. Therefore, create 
files with an initial modulo equal to the total 
bytes in a file after dividing by 500, or equal to 
the number of items in the file, whichever is 
smaller. Then use HASH-TEST to experiment 
with other nearby alternative modulo values to 
see if a slightly smaller or larger modulo might 
be a better choice because it reduces the total 
number of frames in the file, while still keeping 
a small number of frames per group. A 
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The Password 



He've already said that a Data File in the Pick conputer syste* uorks 
in a wry analogous uay to a standard netal file cabinet. Hon so? 


cabinet, a Data File is a 

Data File 

sinilar lnfornation stored in 
each RECORD. 

■■ 

Each RECORD has a unique RECORD 


KEV. Khen you uant to retrieve 
the mfornation in a RECORD (via 

mi 

a BASIC program, for instance), 


you first need a RECORD KEV. 

mi 

By providing the RECORD KEV, you 
tell the syste* uhich RECORD you 

n 

Uttt. 



The RECORD KEV 
tells the syste* 
uhich RECORD you 


Mt&m&ai 



Enter the World of PICK Through a Complete Electronic Learning System 


PROF is a hands-on, interactive learning system that will get you up 
to speed on PICK, quickly and easily. It’s clever, entertaining, and all 
learning is done right on the terminal. 

PROF leads you through simulated, HANDS-ON WORK SESSIONS 
in which you actively participate. You try every important command, 
and carefully review the way the system responds to each. It all hap¬ 
pens right on the terminal. There is no book to hold on your lap. 

PROF contains material that is suitable for both users and technical 
personnel. Give it to your application users. Use it to train new analysts 
and programmers. 

PROF allows you to learn at your own pace. You can follow the sug¬ 
gested order of instruction, or quickly jump from “page” to “page”.. .just 
like a book. 

PROF has an Electronic Master Index which works just like the index 
at the back of a book. You can peruse the alphabetical list of subjects, 
then jump right into any lesson you desire. 


PROF tells you exactly what to type. It then “checks” off each character 
as you type the right key. If you touch the wrong key, you are reminded 
by a single “beep.” Every keystroke is screened electronically. You can¬ 
not make a mistake. 


PROF covers all important aspects of PICK. This includes: 

TCL Database Concepts 

EDITOR PROC 

ACCESS DATA/BASIC 


PROF is customized. There is a different version for each manufac¬ 
turer of PICK-based equipment, including: 


Ultimate 

Microdata 

ADDS 

CDI 

Datamedia 


General Automation 

Evolution 

Pertec 

Altos 

PICK PC-XT 


YES! Please send me more information about PROF. 

Name _ 

Company_ 

Address __ 

City_State_Zip_ 

Phone( )_ 


You can order PROF by writing or calling us at 

CRESCEIMDO Associates. Inc. 

24350 JOY ROAD, SUITE 7 
REDFORD TOWNSHIP, MICHIGAN 48239 
(313) 537-1919 




































STREAMING TAPE 


communication 


hard DISK 


The 68020-based Altos 3068. 

If you're a PICK software developer or dealer, 
you owe it to yourself to see a demonstration 
of the forty-user Altos 3068. 

Call this number, and well make 
the arrangements. 

(800) ALTOS U.S. 


WE SUPPORT PICK. 


(m»r^ 


COMPUTER SYSTEMS 


2641 Orchard Parkway 
San Jose, CA 95134 


PICK is a trademark of Pick Systems. 












